(ignore): Allow interactive call.

diff --git a/lisp/subr.el b/lisp/subr.el
index 8322386fd6d85539736a71bfc95b98d1052ab530..7e6a6c2d7aefd052ce60148bb9cf4793b43fa7f6 100644 (file)
--- a/lisp/subr.el
+++ b/lisp/subr.el
@@ -661,6 +661,7 @@ If MESSAGE is nil, instructions to type EXIT-CHAR are displayed there."
 ;;;; Miscellanea.
 
 (defun ignore (&rest ignore) 
+  (interactive)
   "Do nothing.
 Accept any number of arguments, but ignore them."
   nil)